include "hjconst.jsh"


Script SayAllTest ()

var object objAcc,
int iChildID,
string strValue
Say("SayAllTest", OT_MESSAGE)
let objAcc = GetObjectAtPoint(iChildID,GetCursorCol(), GetCursorRow())
let strValue = objAcc.accValue(iChildID)
Say(strValue, OT_MESSAGE)
;buildin::SayAll(TRUE)

EndScript



